﻿Public Class ProcessData
  Public ReadOnly ProgressForm As New FrmProgress
  Public ReadOnly ResultItems As New System.Collections.Generic.List(Of ResultItem)

  'Public Sub AddResult(sourceProjectName As String, targetProjectName As String, _
  '                      fullPath As String, relativePath As String, _
  '                      dteSubType As String, _
  '                      type As String, _
  '                      result As String)

  '  Dim ri = New ResultItem()

  '  ri.SourceProjectName = sourceProjectName
  '  ri.FullPath = fullPath
  '  ri.TargetProjectName = targetProjectName
  '  ri.Name = relativePath
  '  ri.DTESubType = dteSubType
  '  ri.Type = type
  '  ri.Result = result

  '  ResultItems.Add(ri)

  'End Sub

  Public Sub AddResult(resultItem As ResultItem)
    ResultItems.Add(resultItem)
  End Sub

End Class
